home *** CD-ROM | disk | FTP | other *** search
/ MacWorld Online: Hot Shareware / MacWorld CD-ROM Online (Hot Shareware).cdr / MacWorld2 movie / 00212.ls < prev    next >
Encoding:
Text File  |  1996-03-06  |  1.2 KB  |  45 lines

  1. on mouseDown
  2.   puppetSound("Pipe Bonk.aiff")
  3. end
  4.  
  5. on moveHotSpots
  6.   global scrCount, V2, V3, V4, V5, V6, V7, V8, V9, V10, V11, V12, V13
  7.   set the locV of sprite 2 to V2 - (scrCount * 15)
  8.   set the locV of sprite 3 to V3 - (scrCount * 15)
  9.   set the locV of sprite 4 to V4 - (scrCount * 15)
  10.   set the locV of sprite 5 to V5 - (scrCount * 15)
  11.   set the locV of sprite 6 to V6 - (scrCount * 15)
  12.   set the locV of sprite 7 to V7 - (scrCount * 15)
  13.   set the locV of sprite 8 to V8 - (scrCount * 15)
  14.   set the locV of sprite 9 to V9 - (scrCount * 15)
  15.   set the locV of sprite 10 to V10 - (scrCount * 15)
  16.   set the locV of sprite 11 to V11 - (scrCount * 15)
  17.   set the locV of sprite 12 to V12 - (scrCount * 15)
  18.   set the locV of sprite 13 to V13 - (scrCount * 15)
  19.   updateStage()
  20. end
  21.  
  22. on buttonsOn
  23.   puppetSprite(10, 1)
  24.   puppetSprite(11, 1)
  25.   puppetSprite(12, 1)
  26.   puppetSprite(13, 1)
  27.   puppetSprite(14, 1)
  28. end
  29.  
  30. on buttonsOff
  31.   puppetSprite(10, 0)
  32.   puppetSprite(11, 0)
  33.   puppetSprite(12, 0)
  34.   puppetSprite(13, 0)
  35.   puppetSprite(14, 0)
  36. end
  37.  
  38. on continueRoll
  39.   if rollOver(6) then
  40.     set the castNum of sprite 10 to the number of cast "continue hilite.pct"
  41.   else
  42.     set the castNum of sprite 10 to the number of cast "nada"
  43.   end if
  44. end
  45.